unit frm_ChargeMeterHomeCTP;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, shbl_Card, PropFilerEh, StdCtrls, Mask, DBCtrlsEh, fraAddress,
  PropStorageEh, ActnList, ComCtrls, ToolWin, Buttons, ExtCtrls,
  FIBDatabase, pFIBDatabase, FIBQuery, pFIBQuery;

type
  TfrmChargeMeterHomeCTP = class(TshblCard)
    fraAddress: TfraAddress;
    Panel2: TPanel;
    dbnPotrV: TDBNumberEditEh;
    dbnPotrQ: TDBNumberEditEh;
    Label1: TLabel;
    Label2: TLabel;
    dblcBMonth: TDBComboBoxEh;
    dbBYear: TDBNumberEditEh;
    dbtChargeDate: TDBDateTimeEditEh;
    Label3: TLabel;
    Label4: TLabel;
    QHomeMeterV: TpFIBQuery;
    QHomeMeterQ: TpFIBQuery;
    ReadTransaction: TpFIBTransaction;
    WriteTransaction: TpFIBTransaction;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmChargeMeterHomeCTP: TfrmChargeMeterHomeCTP;

implementation

uses uDM, uMAIN;

{$R *.dfm}

end.
